SET QUOTED_IDENTIFIER OFF
GO
SET ANSI_NULLS ON
GO
CREATE Procedure [dbo].[SP_TDTIPO_OPER_D01]
/*-------------------------------------------------------*/
/*---Empresa              : OFISIS S.A.                --*/
/*---Cliente              : OFISIS                     --*/
/*---Sistema              : Tesoreria                  --*/
/*---M¸dulo               : Empresa                    --*/
/*---Programa             : Eliminacion Detalle        --*/
/*---                       de los tipos de Operacion  --*/
/*---Script               : TDTIPO_OPER                --*/
/*---Nombre SP            : SP_TDTIPO_OPER_D01         --*/
/*---Desarrollado por     : Carlos Marquez E           --*/
/*---Fecha Creaci¸n       : 27/01/2006                 --*/
/*---Base Datos           : Microsoft Sql Server       --*/
/*---Versi¸n              : 8.0                        --*/
/*---Invoca a SP          :                            --*/
/*-------------------------------------------------------*/
/*-------------------------------------------------------*/
/*---ModIficado 1 por     :								--*/
/*---Fecha ModIficaci,n   :								--*/
/*---Detalle ModIficaci,n :								--*/
/*-------------------------------------------------------*/
/*-------------------------------------------------------*/
/*---Comentarios                                       --*/
/*---                                                  --*/
/*---                                                  --*/
/*-------------------------------------------------------*/
/*-------------------------------------------------------*/
/*---Drop Proc SP_TDTIPO_OPER_D01                      --*/
/*---Grant Execute  on SP_TDTIPO_OPER_D01 to public    --*/
/*---SP_TDTIPO_OPER_D01                                --*/
/*-------------------------------------------------------*/
 @ISCO_EMPR		TD_VC_002

 As

 Begin Tran SP_TDTIPO_OPER_D01

	--- Conf Contable x documentos del Detalle de los Tipos de Operacion --
	Delete TRTIOP_DCNT
	Where
	CO_EMPR = @ISCO_EMPR
		If @@error <> 0  
		Begin  
			Rollback Tran SP_TDTIPO_OPER_D01
			Return  
		End  

	--- Detalle de los Tipos de Operacion --
	Delete TDTIPO_OPER
	Where 
	CO_EMPR = @ISCO_EMPR
		If @@error <> 0  
		Begin  
			Rollback Tran SP_TDTIPO_OPER_D01
			Return  
		End  

	--- Asignacion a Pantallas --
	Delete TRTIOP_OPCI
	Where
	CO_EMPR = @ISCO_EMPR
	If @@error <> 0  
	Begin  
		Rollback Tran SP_TDTIPO_OPER_D01
		Return  
	End  

	--- Seteo Contable x Tipo de Operacion --
	Delete TRTIOP_CNTB
	Where
	CO_EMPR = @ISCO_EMPR
		If @@error <> 0  
		Begin  
			Rollback Tran SP_TDTIPO_OPER_D01
			Return  
		End  
	
Commit Tran  SP_TDTIPO_OPER_D01
/*------------------------- Fin ------------------------------*/


GO
